﻿<%
Class HomeControllerOrg
	
	'''测试
	Public Sub taes1()
		Dim t_aes : Set t_aes = Sa.Org("Aes")
		
		Response.Write(t_aes.Password)
		
		t_aes.Password = "123456"
		
		Response.Write(t_aes.Password)
		
	End Sub
	
	'''测试
	Public Sub tbase64()
		Dim t_base64 : Set t_base64 = Sa.Org("Base64")
		
		Dim t_encode : t_encode = t_base64.Encode("123456")
		Response.Write( t_encode )
		
		Dim t_decode : t_decode = t_base64.Decode(t_encode)
		Response.Write(t_decode)
		
	End Sub
End Class
%>